(top): Use `mapc' rather than `mapcar'.

diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index 1187129bb3387bf7b7e9a5457a531fcd6de04c04..a03b58b466ca1d3219d291bab987c8054903dcdc 100644 (file)
--- a/lisp/progmodes/sql.el
+++ b/lisp/progmodes/sql.el
@@ -863,7 +863,7 @@ Based on `comint-mode-map'.")
 (unless sql-mode-abbrev-table
   (define-abbrev-table 'sql-mode-abbrev-table nil))
 
-(mapcar
+(mapc
  ;; In Emacs 22+, provide SYSTEM-FLAG to define-abbrev.
  '(lambda (abbrev)
     (let ((name (car abbrev))